home *** CD-ROM | disk | FTP | other *** search
/ HamCall (October 1991) / HamCall (Whitehall Publishing)(1991).bin / prgming / ada / cas2.pro < prev    next >
Text File  |  1987-10-19  |  3KB  |  63 lines
  1.  
  2. -------- SIMTEL20 Ada Software Repository Prologue ------------
  3. --
  4. -- Unit name    : COUNT_OF_ADA_STATEMENTS_2
  5. -- Version      : 1.0
  6. -- Author       : Richard Conn
  7. --              : TI Ada Technology Branch
  8. --              : Box 801, MS 8007
  9. --              : McKinney, TX  75069
  10. -- DDN Address  : RCONN at SIMTEL20
  11. -- Derivation   : COUNT_OF_ADA_STATEMENTS by Bill Whitaker
  12. -- Date created : 14 Feb 85
  13. -- Release date : 15 Feb 85
  14. -- Last update  : 15 Feb 85
  15. --
  16. ---------------------------------------------------------------
  17. --
  18. -- Keywords     :  Source analysis, Quantity, Statements
  19. --
  20. ----------------:
  21. --
  22. -- Abstract     :
  23. --  This procedure calculates the "STATEMENTS" of a valid Ada fragment
  24. --  specified by a FILE_NAME string parameter.  It need not be a complete
  25. --  compilation unit, but it should have closed all open parens and
  26. --  strings.
  27. --
  28. --  The Ada statement is defined by a semicolon terminator
  29. --  outside of comments, parentheses, or string or character literals.
  30. --  This definition is insensitive to formatting or layout of the source.
  31. --
  32. --  There are exotic cases for which this will misestimate the count
  33. --  but we have never encountered one in real code.
  34. --
  35. --  This procedure is derived from Bill Whitaker's original
  36. --  COUNT_OF_ADA_STATEMENTS, and it does not change his original algorithm.
  37. --  It adds a line count and a character-checksum hash (sum of POS values of
  38. --  all non-space characters in the file mod 256).
  39. --
  40. ------------------ Revision history ---------------------------
  41. --
  42. -- DATE         VERSION         AUTHOR          HISTORY
  43. -- 19850215     1.0             R Conn          Initial Release
  44. --
  45. ------------------ Distribution and Copyright -----------------
  46. --
  47. -- This software is released to the Public Domain (note:
  48. --   software released to the Public Domain is not subject
  49. --   to copyright protection).
  50. --
  51. ------------------ Disclaimer ---------------------------------
  52. --
  53. -- This software and its documentation are provided "AS IS" and
  54. -- without any expressed or implied warranties whatsoever.
  55. -- No warranties as to performance, merchantability, or fitness
  56. -- for a particular purpose exist.
  57. --
  58. -- In no event shall any person or organization of people be
  59. -- held responsible for any direct, indirect, consequential
  60. -- or inconsequential damages or lost profits.
  61. --
  62. -------------------END-PROLOGUE--------------------------------
  63.